gusucode.com > ASP+ACCESS在线手机销售系统(论文+源代码+答辩PPT) > ASP+ACCESS在线手机销售系统(论文+源代码+答辩PPT)\9)ASP 在线手机销售系统\HandsetPro\handset\admin\proModify.asp
<!-- #include file = "include/sysbase.asp" -->
<!-- #include file = "include/ProductTypeBase.asp" -->
<%
dim rsObj,strSQL
dim nID, nTypeId, szName, MemberPrice, MarketPrice, szIntro, szRemark
'获取要修改的手机ID
nID = RealString(Request.QueryString("id"))
'组织SQL语句
strSQL = "SELECT * FROM product WHERE id = " & nID
'查询结果，因为只是读取结果，所以用默认的CursorType和LockType即可
set rsObj = conn.Execute(strSQL)
if rsObj.eof or err then
Response.Write "有错误发生，该手机可能已被删除,<a href = Javascript:window.history.go(-1)>返回</a>"
Response.End()
end if
nTypeId = rsObj("ProductType")
szName = rsObj("Name")
MemberPrice = rsObj("MemberPrice")
MarketPrice = rsObj("MarketPrice")
szIntro = rsObj("Introduce")
szRemark = rsObj("Remark")
'关闭记录集，释放内存
rsObj.Close()
Set rsObj = Nothing
'此时还不能关闭连接，因为下面用到了TypeToSelect函数
%>
<html>
<head>
<title>手机修改</title>
<meta http-equiv = "Content-Type" content = "text/html; charset = gb2312">
<link rel = "stylesheet" href = "include/main.css" type = "text/css">
<script language = Javascript>
<!--
function checkForm(){
if (form1.ProductType.value < 0){
alert("请选择手机具体厂商");
return false;
}
}
//-->
</script>
</head>
<body text = "#000000">
<br>
<form method = "post" action = "proModifySave.asp" name = "form1" onSubmit = "return checkForm()">
<table width = "70%" border = "1" bordercolordark = #9CC7EF bordercolorlight = #145AA0 cellspacing = "0" cellpadding = "4" align = "center">
<tr>
<td colspan = "2" bgcolor = "#4296E7">
<div align = "center"><font color = "#FFFFFF">修改手机</font></div>
</td>
</tr>
<tr>
<td width = "20%" nowrap>
<div align = "right">手机类别</div>
</td>
<td width = "80%">
<%
call TypeToSelect(nTypeId, "ProductType")
'尽早关闭连接，将连接放入连接池
CloseConn()
%>
<input type = "hidden" name = "id" value = "<%=nID%>">
</td>
</tr>
<tr>
<td width = "20%" nowrap>
<div align = "right">产品名称</div>
</td>
<td width = "80%">
<input type = "text" name = "name" size = "40" value = "<%=szName%>">
</td>
</tr>
<tr>
<td width = "20%" nowrap>
<div align = "right">会 员 价</div>
</td>
<td width = "80%">
<input type = "text" name = "memberPrice" size = "12" value = "<%=MemberPrice%>">
￥</td>
</tr>
<tr>
<td width = "20%" nowrap>
<div align = "right">市 场 价</div>
</td>
<td width = "80%">
<input type = "text" name = "marketPrice" size = "12" value = "<%=MarketPrice%>">
￥</td>
</tr>
<tr>
<td width = "20%" nowrap>
<div align = "right">产品简介</div>
</td>
<td width = "80%">
<textarea name = "introduce" cols = "60" rows = "4"><%=szIntro%></textarea>
</td>
</tr>
<tr>
<td width = "20%" nowrap>
<div align = "right">产品说明</div>
</td>
<td width = "80%">
<textarea name = "remark" cols = "60" rows = "4"><%=szRemark%></textarea>
</td>
</tr>
<tr>
<td colspan = "2" nowrap>
<div align = "center">
<input type = "submit" name = "Submit" value = "修改">
<input type = "button" name = "Submit2" value = "返回" onClick = "window.location = '<%=Session("adminOldUrl")%>';">
</div>
</td>
</tr>
</table>
</form>
</body>
</html>